/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / SQL and Data Base / Logic Works ERwin 3.5 / data.1 / ERTMPL32.DLL / RCDATA / 501

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 50 41 52 45 4e 54 20 55 | 50 44 41 54 45 20 52 45 |PARENT U|PDATE RE|
|00000010| 53 54 52 49 43 54 00 20 | 20 2f 2a 20 45 52 77 69 |STRICT. | /* ERwi|
|00000020| 6e 20 42 75 69 6c 74 69 | 6e 20 25 44 61 74 65 74 |n Builti|n %Datet|
|00000030| 69 6d 65 20 2a 2f 0d 0a | 20 20 2f 2a 20 25 50 61 |ime */..|  /* %Pa|
|00000040| 72 65 6e 74 20 25 56 65 | 72 62 50 68 72 61 73 65 |rent %Ve|rbPhrase|
|00000050| 20 25 43 68 69 6c 64 20 | 4f 4e 20 50 41 52 45 4e | %Child |ON PAREN|
|00000060| 54 20 55 50 44 41 54 45 | 20 52 45 53 54 52 49 43 |T UPDATE| RESTRIC|
|00000070| 54 20 2a 2f 0d 0a 20 20 | 69 66 0d 0a 20 20 20 20 |T */..  |if..    |
|00000080| 2f 2a 20 25 25 4a 6f 69 | 6e 50 4b 50 4b 28 3a 25 |/* %%Joi|nPKPK(:%|
|00000090| 25 4f 6c 64 2c 3a 25 25 | 4e 65 77 2c 22 20 3c 3e |%Old,:%%|New," <>|
|000000a0| 20 22 2c 22 20 6f 72 20 | 22 29 20 2a 2f 0d 0a 20 | "," or |") */.. |
|000000b0| 20 20 20 25 4a 6f 69 6e | 50 4b 50 4b 28 3a 25 4f |   %Join|PKPK(:%O|
|000000c0| 6c 64 2c 3a 25 4e 65 77 | 2c 22 20 3c 3e 20 22 2c |ld,:%New|," <> ",|
|000000d0| 22 20 6f 72 20 22 29 0d | 0a 20 20 74 68 65 6e 0d |" or ").|.  then.|
|000000e0| 0a 20 20 20 20 73 65 6c | 65 63 74 20 63 6f 75 6e |.    sel|ect coun|
|000000f0| 74 28 2a 29 20 69 6e 74 | 6f 20 6e 75 6d 72 6f 77 |t(*) int|o numrow|
|00000100| 73 0d 0a 20 20 20 20 20 | 20 66 72 6f 6d 20 25 43 |s..     | from %C|
|00000110| 68 69 6c 64 0d 0a 20 20 | 20 20 20 20 77 68 65 72 |hild..  |    wher|
|00000120| 65 0d 0a 20 20 20 20 20 | 20 20 20 2f 2a 20 20 25 |e..     |   /*  %|
|00000130| 25 4a 6f 69 6e 46 4b 50 | 4b 28 25 43 68 69 6c 64 |%JoinFKP|K(%Child|
|00000140| 2c 3a 25 25 4f 6c 64 2c | 22 20 3d 20 22 2c 22 20 |,:%%Old,|" = "," |
|00000150| 61 6e 64 22 29 20 2a 2f | 0d 0a 20 20 20 20 20 20 |and") */|..      |
|00000160| 20 20 25 4a 6f 69 6e 46 | 4b 50 4b 28 25 43 68 69 |  %JoinF|KPK(%Chi|
|00000170| 6c 64 2c 3a 25 4f 6c 64 | 2c 22 20 3d 20 22 2c 22 |ld,:%Old|," = ","|
|00000180| 20 61 6e 64 22 29 3b 0d | 0a 20 20 20 20 69 66 20 | and");.|.    if |
|00000190| 28 6e 75 6d 72 6f 77 73 | 20 3e 20 30 29 0d 0a 20 |(numrows| > 0).. |
|000001a0| 20 20 20 74 68 65 6e 20 | 0d 0a 20 20 20 20 20 20 |   then |..      |
|000001b0| 72 61 69 73 65 5f 61 70 | 70 6c 69 63 61 74 69 6f |raise_ap|plicatio|
|000001c0| 6e 5f 65 72 72 6f 72 28 | 0d 0a 20 20 20 20 20 20 |n_error(|..      |
|000001d0| 20 20 2d 32 30 30 30 35 | 2c 0d 0a 20 20 20 20 20 |  -20005|,..     |
|000001e0| 20 20 20 27 43 61 6e 6e | 6f 74 20 55 50 44 41 54 |   'Cann|ot UPDAT|
|000001f0| 45 20 22 25 50 61 72 65 | 6e 74 22 20 62 65 63 61 |E "%Pare|nt" beca|
|00000200| 75 73 65 20 22 25 43 68 | 69 6c 64 22 20 65 78 69 |use "%Ch|ild" exi|
|00000210| 73 74 73 2e 27 0d 0a 20 | 20 20 20 20 20 29 3b 0d |sts.'.. |     );.|
|00000220| 0a 20 20 20 20 65 6e 64 | 20 69 66 3b 0d 0a 20 20 |.    end| if;..  |
|00000230| 65 6e 64 20 69 66 3b 0d | 0a 00 10 27             |end if;.|...'    |
+--------+-------------------------+-------------------------+--------+--------+